object frmAttachs: TfrmAttachs
  Left = 0
  Top = 0
  Width = 198
  Height = 200
  TabOrder = 0
  object lvAttachs: TcxListView
    Left = 0
    Top = 26
    Width = 198
    Height = 174
    Align = alClient
    Columns = <
      item
        Caption = #25991#20214#21517
        Width = 140
      end
      item
        Caption = #22823#23567
      end>
    PopupMenu = popAttach
    RowSelect = True
    SmallImages = ilFiles
    Style.LookAndFeel.Kind = lfOffice11
    StyleDisabled.LookAndFeel.Kind = lfOffice11
    StyleFocused.LookAndFeel.Kind = lfOffice11
    StyleHot.LookAndFeel.Kind = lfOffice11
    TabOrder = 4
    ViewStyle = vsReport
    OnDblClick = lvAttachsDblClick
    OnGetImageIndex = lvAttachsGetImageIndex
  end
  object ilFiles: TImageList
    Left = 126
    Top = 58
  end
  object tblAttach: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <
      item
        Name = 'ba_pid'
        DataType = datGuid
        Required = True
      end
      item
        Name = 'ba_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'ba_filename'
        DataType = datString
        Size = 60
      end
      item
        Name = 'ba_ext'
        DataType = datString
        Size = 10
      end
      item
        Name = 'ba_size'
        DataType = datInteger
      end
      item
        Name = 'ba_desc'
        DataType = datString
        Size = 60
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rdaAttachs
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_attachments'
    IndexDefs = <>
    Left = 66
    Top = 28
  end
  object rdaAttachs: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.RemoteService = ClientDataModule.RemoteService
    UpdateDataCall.RemoteService = ClientDataModule.RemoteService
    GetScriptsCall.RemoteService = ClientDataModule.RemoteService
    RemoteService = ClientDataModule.RemoteService
    DataStreamer = ClientDataModule.DataStreamer
    Left = 96
    Top = 28
  end
  object odlgAttachs: TRzOpenDialog
    ToolBtnVisualStyle = vsGradient
    Options = [osoAllowMultiselect, osoHideReadOnly, osoAllowTree, osoShowHints, osoOleDrag, osoOleDrop, osoShowHidden]
    Left = 152
    Top = 50
  end
  object sdlgAttachs: TRzSaveDialog
    ToolBtnVisualStyle = vsGradient
    Left = 124
    Top = 30
  end
  object bmAttachs: TdxBarManager
    AllowReset = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    CanCustomize = False
    Categories.Strings = (
      'Default')
    Categories.ItemsVisibles = (
      2)
    Categories.Visibles = (
      True)
    ImageOptions.Images = dmImages.ilMain
    LookAndFeel.Kind = lfOffice11
    PopupMenuLinks = <>
    UseSystemFont = True
    Left = 112
    Top = 132
    DockControlHeights = (
      0
      0
      26
      0)
    object barManager: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = 'Custom 1'
      CaptionButtons = <>
      DockedDockingStyle = dsTop
      DockedLeft = 0
      DockedTop = 0
      DockingStyle = dsTop
      FloatLeft = 208
      FloatTop = 0
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          UserDefine = [udPaintStyle]
          UserPaintStyle = psCaptionGlyph
          Visible = True
          ItemName = 'btnAddAttachs'
        end
        item
          UserDefine = [udPaintStyle]
          UserPaintStyle = psCaptionGlyph
          Visible = True
          ItemName = 'btnDeleteAttachs'
        end
        item
          BeginGroup = True
          UserDefine = [udPaintStyle]
          UserPaintStyle = psCaptionGlyph
          Visible = True
          ItemName = 'btnSaveAs'
        end>
      OneOnRow = True
      Row = 0
      UseOwnFont = False
      Visible = True
      WholeRow = True
    end
    object btnAddAttachs: TdxBarButton
      Action = actAddAttachs
      Category = 0
    end
    object btnDeleteAttachs: TdxBarButton
      Action = actDeleteAttachs
      Category = 0
    end
    object btnSaveAs: TdxBarButton
      Action = actSaveAs
      Category = 0
    end
    object itemAdd: TdxBarButton
      Action = actAddAttachs
      Category = 0
    end
    object itemDelete: TdxBarButton
      Action = actDeleteAttachs
      Category = 0
    end
    object itemSaveAs: TdxBarButton
      Action = actSaveAs
      Category = 0
    end
  end
  object alAttachs: TActionList
    Images = dmImages.ilMain
    Left = 80
    Top = 132
    object actAddAttachs: TAction
      Caption = #28155#21152
      ImageIndex = 280
      OnExecute = actAddAttachsExecute
    end
    object actDeleteAttachs: TAction
      Caption = #21024#38500
      ImageIndex = 266
      OnExecute = actDeleteAttachsExecute
    end
    object actSaveAs: TAction
      Caption = #21478#23384#20026
      ImageIndex = 360
      OnExecute = actSaveAsExecute
    end
  end
  object popAttach: TdxBarPopupMenu
    BarManager = bmAttachs
    ItemLinks = <
      item
        Visible = True
        ItemName = 'itemAdd'
      end
      item
        Visible = True
        ItemName = 'itemDelete'
      end
      item
        Visible = True
        ItemName = 'itemSaveAs'
      end>
    UseOwnFont = False
    Left = 62
    Top = 92
  end
end
